Comix Games/Comix Games.iso/jetsons/jetsons.exe/jetsons.dxr/00070.ls

Text File | 1996-11-19 | 1.8 KB | 63 lines

on DoClock
  global theSecondsLeft, theFirstClockChannel, theLastClockChannel, theGameOver, theWonLastGame
  if theGameOver = 1 then
    return
  end if
  set theSecondsLeft to theSecondsLeft - 1
  if theSecondsLeft < 0 then
    puppetSound(3, 0)
    puppetSound(1, "Late")
    set theGameOver to 1
    HideAllSprites()
    set theWonLastGame to 0
    go("Lose")
  else
    repeat with h = theFirstClockChannel to theLastClockChannel
      if h = theFirstClockChannel then
        set value to theSecondsLeft / 10
      else
        set value to theSecondsLeft - (theSecondsLeft / 10 * 10)
      end if
      if value = 0 then
        set the memberNum of sprite h to the number of member "Zero"
        next repeat
      end if
      if value = 1 then
        set the memberNum of sprite h to the number of member "One"
        next repeat
      end if
      if value = 2 then
        set the memberNum of sprite h to the number of member "Two"
        next repeat
      end if
      if value = 3 then
        set the memberNum of sprite h to the number of member "Three"
        next repeat
      end if
      if value = 4 then
        set the memberNum of sprite h to the number of member "Four"
        next repeat
      end if
      if value = 5 then
        set the memberNum of sprite h to the number of member "Five"
        next repeat
      end if
      if value = 6 then
        set the memberNum of sprite h to the number of member "Six"
        next repeat
      end if
      if value = 7 then
        set the memberNum of sprite h to the number of member "Seven"
        next repeat
      end if
      if value = 8 then
        set the memberNum of sprite h to the number of member "Eight"
        next repeat
      end if
      if value = 9 then
        set the memberNum of sprite h to the number of member "Nine"
      end if
    end repeat
  end if
end